home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 242 / 242.d81 / light & thunder (.txt) < prev    next >
Commodore BASIC  |  2022-08-26  |  237b  |  14 lines
  1. 30000 forl=54272to54296:pokel,0:next
  2. 30010 s=54272:pokes+24,15
  3. 30020 fori=1to5:poke53281,1
  4. 30030 tq=ti
  5. 30032 ifti<tq+4then30032
  6. 30040 poke53281,0
  7. 30050 tq=ti
  8. 30052 ifti<tq+4then30052
  9. 30060 poke53281,0:next
  10. 30070 pokes+5,28:pokes+1,40:pokes+4,128:pokes+4,129
  11. 30080 tq=ti
  12. 30082 ifti<tq+120then30082
  13. 30090 pokes+4,0
  14.